home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 2002 #11
/
Amiga Plus CD - 2002 - No. 11.iso
/
Tools
/
Development
/
PowerD
/
powerd
/
source
/
lib
/
powerd_lib.lha
/
PowerD_PPC
/
Inp.ass
< prev
next >
Wrap
Text File
|
2001-04-01
|
899b
|
60 lines
.text
.sdreg r2
.align 2
_Inp:
###############################################################################
# name offset
# field 0+0(r13)
# args ###########################
# fh 4+0(r13)
mflr r0
stw r0,8(r1)
stwu r1,-36(r1)
stw r13,24(r1)
mr r13,r1
stw r3,4+28(r13)
if0:
lwz r3,4+28(r13)
lwz r4,@_list0(r2)
stw r4,0+28(r13)
lwz r4,0+28(r13)
li r5,1
bl _Read # Read
mr. r3,r3
bne end0
li r3,-1
b Inpfinish
end0:
Inpend:
lwz r3,0+28(r13)
li r4,0
lbzx r3,r3,r4
Inpfinish:
lwz r13,24(r1)
addi r1,r1,36
lwz r0,8(r1)
mtlr r0
blr
.global _Inp
.type _Inp,2
.size _Inp,$-_Inp
Inp_local:
.global @_Inp_local
.extern _Read
.tocd
.extern _PowerPCBase
.extern _stdin
.extern _stdout
.extern _arg
.extern _GfxBase
.extern _IntuitionBase
.extern _DOSBase
.extern _ExecBase
.data
.extern @_list0
.global list0
list0: .byte 0
.byte 0
.align 2